REPORT MAILING 
WRITER LIST 


1f 
Calculating 


DATA BASE 


Copyright 1981 by Michael Riley 


Distributed by: A.B, Computers. 
- 252 Bethlehem Pike 
Colmar, Pennsylvania 18915 


FLEX FILE 
File Maintenance System 
with 
Mailing List and Report Writer 


copyright 1980 by Michael Riley 


Contents Page 
NOM PET] CEM OUNCES sane tlaca chalets Selewkeees easier ee deena a fegae. 
IN POCUCTAOM. Saniecoe cade dyeiuweve Seen eee ee eeanecet. iS 
Starting a New File ....... i Tire eeeabersanrewunane. 
PPG Mat enance: wae Wid. cecerere oc sweets wate eeaeers Spica aiaciecnte » @&9 
PP IV eG) Maia |.) LQ Sins seas io ool olan a eraraternary orauaereenswem, SO 
Report wWrit@r .e.seees avg irteshod i Guage Goaea ito eterna sb aera eee ar \7 
SELCCLIOM: tetas baw seins cau om sre ae ae we eee a ean eae (Oe 
File Calculations siete edecuiitadineta barat suena 8 
Craate a Sequential File ....cecsesseaeee ee ee ee ea 
Lodd trom @ Sequential File ...cesseeeeeee. dud ets Bccckraeds 29 
Al plabpeti1 Gal Ordering: x sasce dieiseaiwieen enone Gale Cen 31 


Programmer Informati on @eeepevoeeeseeseeecere eoeee eeeve oo 


Prog ram Variables. eoeeaeersesceeeecovreosere eosovesece eee 34 


Jee ee ek eRe R 
FOR NEW PET OWNERS 
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Remove any disks in your disk drive. Turn your PET off then on. If the screen 
says “x COMMODORE BASIC 4.0 ***" then your PET has 4.0 ROMs. If it doesn't then 
skip to the next section. 


When you first receive FLEX FILE, you should make a backup of the FLEX FILE disk. 
Place the disk in drive 1. Place a blank disk in drive 0. Type the following 
line: 


BACKUP D1 TO DO 


Before you press RETURN, check to be sure the line is typed correctly and that the 
correct disk is in each drive. A mistake could cause you to copy the blank disk 
to the FLEX FILE. If everything is OK, press RETURN and remove the original FLEX 
FILE disk from drive l. 


To inspect the contents of the newly created disk, type in the word DIRECTORY then 
press RETURN. The word DIRECTORY, can be abreviated by typing D then I then 
shifted R. Qn some PETs, the command CATALOG, has the same affect as DIRECTORY. 
CATALOGE can be abreviated by typing C then shifted A. 


A disk can contain both programs and files. A program is a set of instrucions 
that tell the computer what to do... A file is a collection of information that is 
used by the computer- Programs can be loaded from disk with the DLOAD command. 
there is, however, an easy way to load and run the first program on a disk. Hold 
down the shift key, press the RUN-STOP key, then let up on the shift key. The 
DATA BASE program will be loaded into the computer. As soon as it is loaded, it 
will start to run. 


FLEX FILE allows you to keep files on the same disk as the FLEX FILE programs. 
However, if your files are large, you will want them on a separate, blank disk. 


The HEADER command must be used to prepare a disk that's never been used before. 
It can also be used to erase an old disk whose information is no longer useful. 
Every disk that's prepared by HEADER must be given a name of no more than 15 
characters. It must also be given a special two digit number called its ID. 


HEADER“MAIL DISK",DO,155 
Will prepare (or erase) a disk, in drive 0, and give it the name MAIL DISK, and an 
[ID number of 55. See your disk manual for more information on how to use these 
commands. 
Here are some words you will need to be familiar with: 
FILE - A file is a collection of information that is used by a program. 
RECORD - A file is often divided up into records. If for example, you wished to 


create a mailing list file, each record would typically correspond to a particular 
person on the list. 


NEW PET OWNERS 


FIELD - A record is often devided into fields. Each record in a mailing list file 
could have a separate field for name, address, zip code, etc. 


SEQUENTIAL FILE - A sequential file is the simplest kind of file. In order for a 
program to access a particular record, it must read through each record 
sequentially until it comes to the correct one. 


RANDOM ACCESS FILE - A random access file is constructed in such a way that the 
Program using it can access any record in a very short period of time. 


KEY FIELD - When a random access file is created, some of its fields can be 


designated as key fields. The records in a random access file can then be put 
into alphabetical order at any time by any of its key fields. 


FORMAT FILES - When you wish to print labels or to print a report, the FLEX FILE 
programs will ask you some questions concerning the way you want your information 
Printed. You will then be allowed to save this information on disk for later use. 
The file containing this information is called a format file. 
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BACKUPS - Before using the FLEX FILE program disk, you should make a backup of it. 
Use the DUPLICATE command or the BACKUP command rather than the COPY command. 
Place the empty disk in drive 0 and the FLEX FILE disk in drive 1. Type the 
following line and hit return: 


OPEN 1,8,15, “DO=1" 


If your PET has 4.0 ROMS, you may use the BACKUP command instead of the above 
procedure. For more information on backukps, see your PET manual. 


VALIDATE = Do not use the VALIDATE command on a disk that has a random File. It 
may erase the file. 


TOOL KIT owners - The tool kit ROM has several commands that incorrectly reset 
some BASIC pointers. The TOOL KIT should be turned off before running FLEX FILE. 
If these pointers set wrong, the ADD, CHANGE, and DELETE commands will cause the 
PET to crash. 


4.0 ROM owners - The universal wedge program has the same problem as the TOOL KIT. 
You should not use this program with FLEX FILE. 


WARNING: There are several situations which can cause loss of information already 
Stored by FLEX FILE.  ODiskettes can go bad. Records can be accidentally deleted. 
Power failures can happen unexpectedly. At the time of this printing, FLEX FILE 
is believed to be free of bugs. However, in a program of this complexity, it is 
difficult to guarantee that certain unusual entries won't cause a crash. To guard 
against these situations, you should: 


L. Backup random file disks whenever a considerable amount of data has been added 
to a file. NOTE: If you have 3.0 ROMS in your PET or 1.0 ROMS in your disk 
controller you must use the DUPLICATE command to backup a disk. Do not use the 
COPY command or the COPY DISK program. 


The recommended way to backup disks is to have at least three copies of each disk. 
At backup time, the latest disk is copied to the oldest disk and the oldest disk 
ts then re-labeled to indicate that it has become the latest disk. 


2- You should NOT use the STOP key to exit the program at any time. If the 
Program is interrupted after an ADD, CHANGE, OR DELETE command, some inportant 
bookkeeping information will not be saved to disk. Ouring these times, the STOP 
key will be disabled on some versions of this program. If you should accidentally 
hit the stop key, clear the screen, type CONT , and hit RETURN. 


3. You should save all formatting information before using any print commands. 


If you have any questions, comments, or suggestions concerning FLEX FILE, you may 
contact: 
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A B Computers 

252 Bethlehem Pike 
Colmar PA 18915 
(215) 822-7727 


NOTE: If you have purchased the new 4.0 ROMS for your PET, but have not purchased 
the new 2.0 ROMS for your disk controller, you will have to make one slight change 
in the DATA BASE program. Add this line to DATA BASE: 


1230 R3=1:R4=0 


ERRATA - If your disk has a program called ERRATA, load and run it. This program 
will inform you of any FLEX FILE information that has become available since this 
manual was printed. 


If the program should crash at any time, try to write down the events that led to 
the crash, the line number of the crash, and any error messages that appeared on 
the screen. Re-run the DATA BASE program and check the most recently accessed 
records to see that their contents are all right. If there is a fault in the 
program, we will make every effort to correct the fault and supply you with a new 
copy. 
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STARTING A NEW FILE 
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Place the FLEX FILE disk if drive 0. Place a blank disk in drive 1. If the blank 
disk has never been used befor, you will have to use the HEADER command (4.0 ROMS) 
or the NEW DISK command (3.0 ROMs) to format the disk. Load and run DATA BASE. 
DATA BASE is the only program you will ever have to load. All the other programs 
are called by DATA BASE. 


The program will ask you if you want to START A NEW FILE or OPEN AN OLD FILE. 
Press tne S key to start a new file. Whenever you are asked a question and you do 
not see a blinking cursor, then you need only press a single key to answer. You 
do not need to press RETURN. You will now be asked: 


NAME OF FILE? 


Underneath the question you will see a blinking cursor. A blinking cursor means 
that you are expected to type out an answer and then hit RETURN. Do not hit 
RETURN until you have checked to see that you have typed the answer correctly. If 
you have made a mistake, you may use the CURSOR LEFT, CURSOR RIGHT, and DELETE 
keys to correct the answer before you hit RETURN. Do not use the CURSOR UP or 
CURSOR DOWN keys. The cursor must be on the same line as your response when you 
hit RETURN. : 


For this exercise we will be creating a file to be used as a mailing list. Let's 
name the file "MAIL". Type out MAIL and hit RETURN. The program will ask you: 


WHAT IS THE MAXIMUM NUMBER OF RECORDS THE FILE WILL: CONTAIN? 
0 


Change the 0 to 1000 by typing 1000 then hit RETURN. The program will ask: 


WHAT IS THE MAXIMUM LENGTH OF EACH RECORD?. (TOTAL NUMBER OF 
CHARACTERS IN ALL FIELDS PLUS TWO FOR EACH FIELD). 


0 


Let us assume that you do not expect you will need more than 100 characters of 
tnformation for each record and that each record will have tan fields. Type 120 
and hit RETURN. The program will now tell you: 


MAXIMUM RECORD SIZE = 127 CHARACTERS 


Notice that the program has given you a few extra characters per record than you 
asked for. This is because the program packs as many records as it can into a 
disk block. Each block holds 254 characters. Any space left over is divided 
evenly among the records. 


The number of characters allowed for a record will always be one of the following: 


254, 127, 84, 63, 50, 42, 36, 31, 28, 25, 23, 21, 19, 18, 16, 15, etc. 


STARTING A NEW FILE 


The program will now tell you: 
ESTIMATED SIZE OF FILE WHEN FULL [S 540 BLOCKS 


The Commodore 2040 (and 3040) disk drives each hold 640 blocks per disk. That 
should give us enough room for our file and leave 100 BLOCKS free. (An 8050 disk 
drive will leave more free.) If you are using the program to design your oun file 
and have exceeded the capacity of the disk, you will be given a chance to make 
changes later. The program will now ask: 


HOW MANY FIELDS PER RECORD? 
Q 


A record may have up to 20 fields. It is possible to make a simple change in the 
program so that the maximum number of fields allowed is more than 20. See the 
Section on programing information for details. Each field may contain a maximum 
of 79 characters. For our mailing Jist 10 iverce will suffice. Type 10 and hit 
RETURN. The program will ask: 


TITLE FOR FIELD NO. 1 ? 


Field titles can be up to 70 characters long, however a length of less than 15 
characters is recommended. The title of our first field will be “First Name". 
That is, the first name of each person on the mailing list will be stored in field 
#1. Type FIRST NAME and hit RETURN. The program will then ask you for the titles 
of the other fields. A typical mailing list would contain: 


1. FIRST NAME 
2. ‘LAST NAME 
3. COMPANY 
4. STREET 
Ss. CITY 

6. STATE 

7. ZIP 

8. COUNTRY 
9. PHONE 
10. TYPE 


In this example, first and last names are stored in separate fields so that 
records may be sorted by last name. City and state are in separate fields in case 
you ever want to sort by state. The contents of the phone field will] not be 
printed .on the mailing labels but it is convenient to keep a phone number in the 
data base for reference. The TYPE field will be explained later in the section on 
printing labels. Enter each field title when asked and hit RETURN. The program 
will ask you 


HOW MANY KEYS DO YOU WANT? 
(NO. FIELDS YOU WISH TO SORT BY?) 
l 
Enter 2. (Change the 1 to a 2 and hit RETURN.) 


WHICH FIELD IS KEY FIELD NO. 1? 
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Enter 2 for LAST NAME. Oesignating LAST NAME as a key field means that the file 
will always be kept in alphabetical order by last name. As each record is 
entered, it will be placed in correct alphabetical sequence. 


WHICH FIELD IS KEY FIELD NO. 2 ? 


Enter 7 for ZIP CODE. Having this second key field for ZIP CODE means that the 
file can be put in numerical order at any time by Zip code. This reordering by a 
Previously designated key field takes less than a second. Mailing lists are 
usually ordered by last name so that when a record needs to be altered or 
tnspected, the program can find it quickly. When labels are to be printed, the 
file is reordered by zip code in order to qualify for lower postal rates. 


The program will ask you: 
WANT TO MAKE CORRECTIONS?( Y/N) 


Hitting the Y key for “yes” will allow you to correct any entries. It will also 
allow you to check your entries to see if any mistakes were made. Press Y for 
“yas". The program will now ask you the same series of questions it just asked. 
It will also show you the answers you gave and allow you to make changes if you 
wish. 


NAME OF FILE: 
MAIL 


The blinking cursor should be on the M in MAIL. If you need to correct the 
spelling of your answer to this question, or if you have decided to change your 
answer, you may do so. You may use the CURSOR LEFT, CURSOR RIGHT, DELET& and 
INSERT keys to help make corrections. The name of a file should be less than 12 
characters long. It should not contain a quote character ("), a comma (,) or a 
colan. When you have made your changes, hit return. If no changes need to be 
made, simply hit RETURN. After you've inspected and corrected all of your 
entries, the question CORRECTIONS?(Y/N) will be asked once again. If you are sure 
that all entries are correct, Press N. The program will ask you: 


DRIVE?(1/0/1) 
Hit 1 for DRIVE 1. 


NOTE: The letter I means you have a chance to initialize the disk if you need to. 
Instead of hitting 1, you would hit I then 1. New PET owners with 4.0 ROMs need 
not use the [ key as long as each disk has a different ID. (See your PET maanua] 
for information on disk ID. 


Qn some versions of this program, the screen will display: 

(ALLOCATING BLOCKS) 
If the error light blinks at this time, it may be ignored. If you are starting a 
large file, this procedure may take some time. When the blocks have been 


allocated, two or three of the following lines will] be displayed to indicate that 
the bookkeeping information for the file is being saved. 
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(SCRATCHING OLD BOOKKEEPING) 
(SAVING BLOCK MAP) 
(SAVING POINTERS) 


The DATA BASE program will then be loaded. The program will display: 
START NEW FILE OR OPEN OLD FILE? 


Press 0 to open an old file. The program will ask you for the name of the file 
and the drive, and then give you a chance to add records. For more information on 
adding records, see the chapter on FILE MAINTENANCE. 
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It is important to know that you should always use the EXIT command to leave the 
program. The EXIT function saves important bookkeeping information for your file. 
It is usually safe to end the program with the STOP key provided that no changes 
have been made to the file and that no disk operations are being performed while 
the key is being pressed. However, if in doubt use the EXIT command rather than 
the STOP key. 
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FILE MAINTENENCE 
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This chapter will show you how to add and change records using the MAIL file 
created in the previous chapter. Place the FLEX FILE disk in drive 0 and the disk 
with the MAIL file in drive 1. Load and run DATA BASE. The program will ask you: 


START A NEW FILE OR OPEN AN OLD FILE? 


Press 0 for OPEN AN OLD FILE. The program will then ask you to enter the name of 
the file, and ask you for the drive number of the file. When you have entered the 
name and pressed 1 for DRIVE 1, the program will display one or both of the 
following lines:. 


(LOADING BLOCK MAP) 
(LOADING POINTERS) 


The light for drive 1 will come on to indicate that a file is open. This light 
will stay on until the program is ended. The program will ask: 


ADO, REP, CHANGE, DEL, NEXT, PREV, GOTO, FIND, BROWSE, KEY, TRANS, USER, EXIT 
The meaning of these choices is: 


1. AOD a new record to the file 

2. REPlicate the displayed record 

3. CHANGE the last record shown 

4. OELete the last record shown 

5- view the NEXT record 

6- view the PREVious record 

7. GOTO a record with a specified record number 

8. FIND a record with a specified key field 

9. BROWSE through the records while displaying a single field 
10. re-sort the file by a different KEY 
11. TRANSfer to another program 
12. a dummy routine which the USER can program. 
13. EXIT the program and save 21] bookeeping when necessary 


ADD A RECORD - to add a record, press A. 
The program will ask: 


ADDING RECORD #1 
FIRST NAME: 


Enter MICHAEL. The program will then ask for each of the other fields. For this 
sample record enter the following information: 


FIRST NAME: MICHAEL 
LAST NAME: RILEY 
COMPANY : TOTAL CONTROL SOFTWARE 


STREET: 1038 PINE 
CLIiy: PHILADELPHIA 
STATE: PA , 
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ZIP: 19107 
COUNTRY 

PHONE : 215-WA3-9663 
TYPE A 


Notice the blank entry for country. With this program it 1s posible to give a 
NULL ENTRY. This is accomplished simply by hitting return without typing any 
information. In this mailing list a nul] country field will be assumed to mean 
Ue S.A. 


As a general rule, there are certain punctuation marks which should not be used in 
an entry. These are comma (,), colon (:), and quote("). They may cause the 
program to remember only the first part of your entry. When all the fields have 
been entered, the program will ask if you wish to make corrections. If you press 
Y for “yes", you will be asked to enter each field again. This time, however, the 
field contents that you previously entered will be already printed on the screen 
under the blinking cursor. Therefore, if the entry does not need to be changed, 
simply press RETURN without changing the entry. 


When all fields have been re-entered with their corrections, the question, 
CORRECTIONS?(Y/N) may be answered by pressing N for “no"“. The program will then 
display the record and the usual DATA BASE menu. 


At the top of the record, the following line will appear: 
KEY#1 =LAST NAME RECORD#1 


This line tells you which key field the file is currently being sorted by and the 
relative position of the record. 


In order to demonstrate the other commands, we will need at Teast 2 records, 
therefore, press A for ADD A RECORD and enter the following information: 


FIRST NAME: ABEL 
LAST NAME : BAKER 


ADDRESS: 8050 MICROPOLIS ORIVE 
CITY: SILICONE VALLEY 
STATE: CA 

ZIP: 20173 

COUNTRY 

PHONE: 515-710-5432 

TYPE: B 


When you have pressed N for CORRECTIONS?(Y/N), the record will be displayed along 
with the following line: 


KEY# 1 = LAST NAME RECORDS 1 
Notice that the Baker record now holds the #1 position in the file. This is 
because the file has been re-ordered by last name. The Riley record now holds the 
#2 position. 


REPlicate a record - There are many situations where you may want to enter a 
series of records that are very similar. -For example, several people on your 
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mailing list may work at the same company and have the same mailing address. Use 
the GOTO or FIND command to display the record you want to replicate then hit R. 
Annother copy of the record will be added to the file. You will be given a chance 
to make any desired changes to the new record. 


GOTO A RECORD - pressing G for GOTO causes the program to display: 
GOTO RECORD # 


with a flashing cursor after the # sign. Enter the record number (in this case 
either 1 or 2) and the appropriate record will be displayed. 


FIND A RECORD - Pressing F for FIND will display the following prompt: 
ENTER LAST NAME: 


LAST NAME is requested in our example because KEY number 1 is the specified key 
field. If key number 2 were specified, you would be asked for ZIP CODE. Type in 
RILEY or BAKER and press RETURN. The appropriate record will be displayed. 


When two or more records have the same key field (two people with the name SMITH, 
for example), the program will find the first record that has the requested key 
field. If the requested record does not exist, the program finds the position the 
record would occupy if it did exist and displays the record which occupies that 
position. If only the first part of the field is entered (i.e., SM for smith) the 
Program will find the first record whose key field begins with those letters. 

This feature can be used to search for a record when you are not sure of the 
spelling of its key. Entar the part that you are sure of and use the NEXT command 
to find the record. 


NEXT - pressing N for NEXT causes the program to display the record following the 
currently displayed record. | 


PREVious ~- P for “previous” displays the record proceding the currently displayed 
record. 


BROWSE - Pressing B allows you to browse through the file. The program will ask 
you which field you wish to inspect. Spell out the field name and press RETURN. 
The program wil] display that particular field for each record starting with the 
most recently displayed record. Ta stop the browse, press any key. (Do not press 
the STOP key.) 

KEY - Pressing K for KEY will cause the program to display: 


KEYS: 
1. LAST NAME 


2. ZIP 
WHICH KEY DO YOU WANT USE? 
l 
Entering a 2 (changing the 1 to a 2 and hitting RETURN) will reorder the file by 
Zip- code. : 
TRANSFER - T for TRANSFER allows you to transfer control from the DATA BASE 
il 
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Program to any of the other FLEX FILE programs. The program will ask you: 
TRANSFER TO OTHER PROGRAMS: 


MAILING LABELS 

REPORT WRITER 

CREATE SEQ FILE 

LOAD FROM SEQ FILE 
ALPHABETICAL REORDERING 
FILE CALCULATIONS 

NONE OF THE ABOVE 


Pressing M, R, C, L, A, or F will automatically load and run the appropriate 
Program. If any major changes have been made since sign-on, the bookkepping wil] 
be saved before the transfer is made. Pressing N will return you to the DATA BASE 
menu. 


EXIT - When the DATA BASE menu is displayed, pressing E for EXIT saves the 
bookkeeping and ends the program. 


A typical sorting problem for mail programs is that some records wil] have a name 
and no company, and other records will have a company, and no name. One solution 
is to designate both the LAST NAME and COMPANY fields as key fields. Another is 
to enter the name of the company under the heading LAST NAME whenever that field 
is blank. 


re 
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PRINTING MAIL LABELS 
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Load and run DATA BASE, and open the MAIL file. The MAIL LABELS program can print 
a file in alphabetical order by any key field. If, for example, you wanted labels 
printed by zip code, you should use the KEY command to sort the file by zip code 
before transferring to the MAIL LABELS program. | 


When the proper key is set, use the transfer command to load the MAIL LABELS 
program. The program will offer these choices: 


LOAD FORMAT 

CHANGE (CREATE, INSPECT) FORMAT 
SAVE FORMAT 

PRINT LABELS 

RETURN TO DATA BASE 


At this point, you could use the CHANGE option to create a new format file. The 
format file contains the instructions that determine how the labels will be 
printed. This chapter will show how to load an existing sample file and change it 
to suit your needs. Press L to load the sample printing format that comes with 
the FLEX FILE programs. The program will display: 


NAME OF FORMAT FILE? 
MATL 


Press RETURN to load the sample format named MAIL. (The default title of the: 
format is the same as the title of the DATA BASE file.) The program will then ask 
the drive number of the file. Since the file is on the flex file disk, press 0 
(zero) for drive 0. The file will load the format and return the MAIL LABEL menu 
to the screen. 


Press C for CHANGE FORMAT. The program will ask: 
HOW MANY LABELS ACROSS? 
3 


If your label paper requires that you print more or less than three labels across, 
change the number 3 to the correct number and press RETURN. 


You will then be asked the COLUMN POSITION of each label across. If you have an 
80 character per line printer then there are 80 character positions where the 
printing for each label could start. The left most position is #1, not #0 (if a 0 
ts entered, the question will be repeated). If, for example you wished to print 
labels three across on an 80 column printer, you should enter 1, 27, and 53 when 
asked the position of each label (80 divided by three is about 27). 


HOW MANY PRINTED LINES PER LABEL? 
2 


Change 5 to the appropriate number and hit return. A list of the field titles of 
the file will be displayed, then the program will ask: 
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PRINTING MAIL LABELS 


FIELDS TO BE PRINTED ON LINE NUMBER 1: 
1,2,0 


The 1 refers to our FIRST NAME field. The 2 refers to our LAST NAME field. The 0 
simply means that no other fields will be printed on line one. Up to three fields 
may be combined on a line. When the labels are printed, the program will separate 
these fields with a single space. If you wish to change this entry to suit your 
own needs, be sure to enter al] three numbers. A number may be changed to a Zero 
but it should not be erased. Use the CURSOR RIGHT key to move from one number to 
another. The space key will erase the commas. If a comma gets erased, simply 
type it back in. Press RETURN when ready. 


The question will be repeated for each printed line, then the label arrangement 
will be displayed: 


ARRANGEMENT : 


FIRST NAME LAST NAME 
COMPANY 

STREET 

CITY STATE ZIP 
COUNTRY 


The next question: 


NUMBER OF EMPTY LINES BETWEEN LABELS: 
1 


Change 1 to the appropriate number and press RETURN. The MAIL LABEL menu will be. 
displayed again. I[f you wish to check over your entries or make any revisions, 
you may press C again and repeat the above sequence of questions and answers. 


It is highly recommended that you save the format to disk before printing labels. 
Press S for SAVE FORMAT. You will see: 


NAME OF FILE 
MATL 


In this case, the default file name is MAIL. The file name will always default to 
the last file name used. You may find it convenient to save the format you have 
just written under the same name. If you do, the old MAIL format file will be 
erased. You may save as many different format files as you wish, each with a : 
different name. It is possible to have a MAIL LABEL format file, a REPORT WRITER 
file, and a DATA BASE random access file al] with the same names and all on the 
same disk. This is because each program adds its own set of characters 
(DB-,ML-,CA~, or DB-) to the beginning of each file name to distinguish it from 
files saved by other programs. 


Align your label paper in your printer so that the position where the first line 
is to be printed is directly under the print head. Press P for PRINT. The 
program will prompt: 


TYPE OF RECORD TO PRINT: 
(ENTER NULL FOR ALL) 
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PRINTING MAIL LABELS 


(ENTER CHARACTERS FOR CERTAIN TYPES} 
(ENTER # THEN REC NO. TO REPEAT ONE) 


There are three ways to answer this question. The first is to Teave the line 
blank and hit RETURN. This will print all records in sorted order. 


The second way to answer this question is to enter certain characters to indicate 
which records will be printed. This feature only works if your file has been set 
up properly in advance. The file to be printed must have a special field whose 
title is TYPE. The TYPE field of each record should contain characters which 
indicate the type or types the record belongs to. Each type should be represented 
by a single letter or digit. For example: 


F .- for personal friends 

C - for. customers 

P - for prospective customers 
D - for distributors 


A record may belong to several types. An entry might reprsent a person who is a 
customer and also a distributer. His TYPE field would contain a two character 
entry; i.e., CD. A request to print records of type FPD would print any record 
whose TYPE field contained the characters F, P, or 0. 


The third way to answer this question is to enter the pound sign (#) followed by 
the number of the record you want to print. For example, you may wish to print 
Several hundred labels with your own name and address to use as return address 
labels. If your record is record number 347, you would enter: 


#347 


The program will continue to print record number 347 until you tell it to stop. 
When the type of record is entered, the prograram will ask: 


PRINTER DEVICE 4? 
4 


Most printers are pre-set to device 4. If you printer has a different device 
number, change the entry before hitting RETURN. The program will ask: 


CONTROL CHARACTER SENT TO PRINTER: 
(ENTER 0 FOR NONE) 
0 


This feature can be used with printers that are able to print different type faces 
under software control. Enter the ascii values of the required control 
characters. Press RETURN after each value. When all have been entered, enter 0 
to start printing. 


PRINTER REQUIRES LINE FEED?(Y/N) 


Commodore printers do not require a line feed character to be printed after each 
Tine, but many other printers do. An incorrect answer to this question will cause 
the printer either to double space or to overprint each line. When the question 
1S answered, printing will start and the screen will display: 


~ 
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PRINTING MAIL LABELS 


PAUSE 
CONTINUE 
STOP PRINTING 


Pressing P for PAUSE temporarily stops the printing to let you change paper if 
needed. The program will print the current line of labels, then stop. 


Pressing C for CONTINUE starts the printing where it left off. 

S for STOP PRINTING returns you to the main MAIL LABEL menu. 

As the labels are being printed, you may notice that blank lines on labels are 
deleted. In our format example, the second line of the label is reserved for the 
COMPANY field. On some records this field may be blank. Instead of leaving a 


blank line on the label, the program prints each following line, one line higher 
to close up the space.. 


When the printing is done, the MAIL LABELS menu wil] appear. 
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REPORT WRITER 
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Load and run DATA BASE. Open the sample file named INV on your FLEX FILE disk. | 
By stepping through the file, you can see that the fields are arranged like this: 


Record #1 
1 Product: BYTE(name of product) 
Ze TYPE: B(type of product ) 
3. START: 3(start of month inventory) 
4. TRANS IN: 20(purchased form dealers) 
5. TRANS QUT: Q( returned) 
6. SOLD: 17(sold) 
7. END: 3(end of month inventory) 
8. PRICE: 200(price of product in cents) 


TRANSfer to the REPORT WRITER program, and you will see this prompt: 


LOAD FORMAT 

CHANGE (CREATE, INSPECT) FORMAT 
SAVE FORMAT 

PRINT REPORT 

RETURN TQ DATA BASE 


Press L for LOAD FORMAT. You will be asked for the name of the format file and 
will be presented with a default name. In this case, the default name is INV 
which is the name of our REPORT WRITER format file, therefore simply press RETURN. 
Ihnen press Q to indicate that the file is in drive 0. 


The REPORT WRITER menu will reappear. Press C for CHANGE FORMAT. We will use the 
CHANGE mode to inspect the sample format file and see how a particular report 
might be be generated. You may, if you wish, make changes to the file to see how 
they affect the printout. The CHANGE command can also be used to write a FORMAT 
from scratch. Jo do this, use the CHANGE command without first loading 2 format 
file. All the entries will then default to 0's and blanks. 


When C is pressed the CHANGE menu will appear: 


CHANGE: 
HEADER LINES 
TITLES FOR COLUMNS 
SELECTION OF RECORDS CRITERIA 
POSITION AND CONTENTS OF COLUMNS 
CALCULATE COLUMNS INFO 
JUSTIFICATION, TOTALS, AVRS. 
NONE OF THE ABOVE 


HEADER LINES - Pressing H for HEADER LINES allows you to add or change the header 
lines of your report. If you look ahead in this manual you will find a sample 
report written according to the sample format file. The header lines are the 
three lines of text that are centered at the top of the first page. The CHANGE 
HEADER routine allows you to enter up to 20 lines. These lines will be centered 
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REPORT WRITER 
at the beginning of the first page of the report. 


TITLES FOR COLUMNS - In the sample report, there are eleven columns of 
information. Their titles are PROD NAME, TYPE, START MONTH, etc. The CHANGE 
TITLES routine asks you for the number of columns you wish to print and the first 
and second line of each title. You are allowed a maximum of 20 columns. 


POSITIONS AND CONTENTS OF COLUMNS - Press P to change and inspect the way in which 
the report information will be arranged on the page. The program will ask how many 
columns you want to print, then it will display the field titles for the INV file 

and ask: 


COLUMN #1: PRODUCT NAME 
LOAD FROM DATA BASE FIELD NO: 
2 


The title of column #1 is PROD NAME. We want the contents of this column to be 
identical to the NAME field of our file. NAME is field #2 so enter 2. Some 
columns will not be loaded from fields. They will be calculated from information 
in other fields. Answer Q for columns that are to be calculated. The next 
question: 


POSITION OF COLUMN #1? 
l 


POSITION refers to horizontal starting position of each column. If your printer 
prints 120 characters across, there are 120 positions where each column can start. 
The first position is 1 not 0. You may wish to mark off the positions on a piece 
of graph paper befor you enter them. Each report column must be at least two 
character positions to the right of the preceeding column. I[f it is not, an error 
message will be displayed. 


After printing a first draft of a report, you may notice that the spaces left for 
some columns are too small and the spaces for others are too large. A feature has 
been added so that you may more easily correct this situation. Instead of 
entering the position where the column is to start, you may enter a plus sign (+) 
or a minus sign (-) followed by a number. This number will change the space 
allotted for the column by changing the positions of the remaining columns. For 
example, suppose the space for column five is too narrow and you wish it to be two 
Spaces wider. When prompted with... 


POSITION COLUMN 5 
56 


«Change the default column position (in this case, 56) to +2 and hit RETURN. 
The position of each column to the right of column five will be increased by two. 
The minus sign is used to reduce the space for a column. 


When the contents and position of each column has been specified, the programn 
will ask the total character width of your printer. The program will then return 
to the CHANGE menu. 


CALCULATIONS - To enter the CHANGE CALCULATIONS mode from the main menu, press C 
and then C again. You will see: 
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HOW MANY OPERATIONS DO YOU WANT TO PERFORM? 
8 


Enter the default number 8. You will see: 


COLUMNS : 

1. PROD NAME 2. TYPE 3. START INV 4. TRANS IN 

5. TRANS QUT 6. SOLD 7. EST INV 8. ERR 

9. END INV 10. UNIT PRICE 11. VALUE 12. RUNNING TOTAL 


QPERATION #1 C72 ,C3 ,+ ,C4 (est inv = start inv + trans in) 
Hit RETURN five more times to display all of the operations: 


OPERATION #2 C7= ,C7 ,+ ,C5 (est inv = est inv + trans in) 
OPERATION #3 C7= ,C7 ,- ,C& (est inv = ast inv = sold) 

OPERATION #4 C8= ,C9 ,- ,C7 eo = end inv - est inv 

OPERATION #§ C10=,C10,/ ,100 (unit pricesunit price/[divided by]100 
OPERATION #6 C1i2,C10,* ,C9 (value = unit price *{times] end inv) 
OPERATION #7 CO= ,CO ,+ ,Ci1 (column zero = column Zero + value) 
OPERATION #8 C122,CO ,. ; (running total = column Zero) 


Operations one through three in our example, are used to calculate the estimated 
end of month inventory. Here's how it works. Operation number 1 causes the start 
of month inventory, (column 3) to be added to the number of items transferred to 
the store by suppliers (column 4). And the answer is temporarily stored in column 
7. Operation #2 causes the number of items transferred out (column 5) to be 
subtracted from column 7. Operation #3 subtracts the number of items sold (column 
6) from column 7. 


The actual end of month inventory is stored in column 9. By subtracting column 7 
from column 9, the variance (column 8) is determined. A negative variance might 
indicate that stock was stolen, mislaid, or miscounted. 


The running total (column 12) is updated for each record by adding the stock value 
(column 11) to column 0 and then transfering the contents of column 0 to the 
running total (column 12). This running total feature makes use of the facts that 
column 0 is not zeroed after each record is printed. 


See the chapter on file calculations for more examples of calculations. 
JUSTIFICATION, TOTALS AND AVERAGES - This routine Jets you decide which columns 
need to be numerically justified and which columns are to be totalled and/or 
averaged at the end of the report. Numeric justification means that numeric 
column contents will be aligned by decimal point: 


NOT JUSTIFIED: 


JUSTIFIED WITH FOUR DIGITS TO THE LEFT 
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AND THREE DIGITS TO THE RIGHT OF THE DECIMAL PLACE: 
5-789 


1000.600 
4.000 
.002 


To enter this routine from the main menu, type C and then [. You will see: 


HOW MANY COLUMNS 00 YOU WANT TO PRINT? 
12 


Enter 12. The program will ask: 


COLUMN #1: PROD NAME 
NUMERIC JUSTIFIED? 
N 


Column #1 will contain the name of each product so it does not need to be 
justified. Enter N for "no". You will see: 


TOTAL AT END? 
N 


Enter N. At the end of the report, a TOTAL or AVERAGE will be printed for those 
columns whose TOTAL or AVERAGE prompt was answered with a Y for YES. Next prompt: 


AVERAGE AT END? | 
N “fs 


Enter N. This line of questioning continues for al] 12 columns. When a column 
needs to be justified such as columns 10 through 12, in our example, enter Y 
instead of N for JUSTIFY COLUMNS? question. When a column is to be justified, two 
additional questions will be asked: 

PLACES TO LEFT OF DECIMAL POINT: 


4 


The entry 4 indicates that the number to be justified is not expected to be larger 
than 9999. . 


PLACES TQ RIGHT OF DECIMAL POINT 
2 


The 2 entry indicates that numbers will be rounded down so that only two digits 


will be displayed to the right of the decimal point. 


PRINTING A REPORT - At the beginning of this manual is a warning about printing or 
pig. before al] data has been saved. Before you print, make sure your format 
as been saved. 


To print a report, align the paper in your printer so that the print head is 


positioned to print immediately below the top of the first sheet of paper. While 
the main menu is displayed, press P for print. You will be asked: 
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DEVICE NUMBER? 
4 


Most printers are set to Device number 4. If an incorrect device number is given, 
or if your printer is turned off, a DEVICE NOT PRESENT ERROR message will appear 
and the program will end. Load DATA BASE and start over. 


LINES PER PAGE? 
66 


If your printer has normal spacing and you are using standard 8-1/2x11 inch paper 
then your paper will be able to contain a maximum of 66 lines. If an incorrect 
number is given, the program will print pages that are too long or too Short. 


LINE FEED? 
Y 


Most printers require a line feed after a carriage return. Some, such as the 
Commodore printer, do not. An incorrect answer to this question will cause your 
printer to either advance two spaces after each line or, fail to advance the paper 
at all. 


PAUSE AT END OF PAGE? 
N 


Pause at end of page will cause the printer to stop printing after each page until 
you press C for “continue”. This allows you to adjust the paper after each page 
is printed. Pause may be required if you are using a friction feed printer. 


When all these questions are answered, the following prompt will appear, and the 
Printing will start: 


PAUSE 
CONT PRINTING 
STOP AND RETURN TQ MENU 


P can be pressed to temporarily halt the printing. Pressing C will resume the 
printing where it left off. S stops the printing entirely and returns to the 
Menu 


CHARACTER SENT TO PRINTER: 
0 


This feature can be used with printers that are able to print different type faces 
under software control. Enter the ASCII values of the required control 
characters. Press RETURN after each value. When all] have been entered, enter 0 
to start printing. 


After you have printed your first report you will want to inspect it for format 
errors. A common error js not giving enough room for each column. The program is 
very forgiving and will try to make the best of the situation. An extra line will 
be inserted and the characters that did not fit will be printed on the new line. 
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SELECTION OF RECORDS 
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SELECTION - The CHANGE SELECTION routine in the REPORT WRITER program allows you 
to select only certain records to be included in the report. Record selection may 
be used for a variety of reasons. A personnel manager may wish to search through 
a list of applications and print out pertinent information for only those 
applicants whose qualifications meet the requirements of a specific job. A 
research team may have a file of information about their experimental animals. 

The ability to print a list of animals whose history and present condition meet 
specific criteria could save days of tedious, error prone work. A company may 
want a list of accounts receivable that exceed a certain dollar amount and precede 
a certain date. A salesman may wish a list of accounts for certain products in a 
certain area of the country. Marketing personel can learn the effect an ad 
campaign has had on a certain group of products within, a certain period of time. 


The selection criteria for our example is: 
IF (TYPE NOT EQUAL TO 8) THEN PRINT. 


This sentence was constructed by the CHANGE SELECTION routine. It says in effect 
"only those records whose TYPE field is not equal to 'B' will be printed." To see 
how this sentence was constructed, LOAD and run DATA BASE, open the INV file, 
transfer to REPORT WRITER, LOAD the INV format file, then enter the CHANGE 
SELECTION mode by pressing C. You will see: 


SELECT OR PRINT ALL RECORDS? 
We want to select certain records. therefore, press S. The program will display: 
FIELDS; 


1.0N ORDER 
2 NAME 
3-PRICE 
4.TYPE 
5START INV 
6 TRANS IN 
7+TRANS QUT 
8-SOLD 
9.END INV 


YOUR SELECTION STATEMENT: 
IF (... NOT EQUAL TO B) THEN PRINT. 


ENTER FIELD NO: 

4 
The program is asking us if we want to change the word TYPE by entering a 
different field number. If, for example, we changed the 4 in the default to a 2 


then the sentence would read IF NAME NOT EQUAL TO B THEN PRINT. Press RETURN. 
The display will read: 
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EQUALITY TYPES: 

1. EQUALS (identical to, character for character) 

2. LESS THAN (less than numerically) 

3. GREATER THAN (greater than numericaly) 

4. PRECEDES (precedes alphabetically) 

5. FQLLOWS (follows alphabetically) 

6- NOT EQUAL TO (not identical to) 

7~ PATTERN MATCHES (? in argument is wild character, * is wild ending) 

8. INCLUDED IN (any characters in field identical to any characters in 
argument ) 


YOUR STATEMENT: 
IF (TYPE...B) THEN PRINT 


ENTER EQUALITY TYPE NO: 
6 


The program is asking if we want to change the equality type. Press return and 
see: 


ARGUMENT CAN BE ANY ALPHA-NUMERIC STRING. 


YOUR STATEMENT: 
IF (TYPE NOT EQUAL TO...) THEN PRINT. 


ENTER ARGUMENT : 
B 


The program is asking if we want to change the argument. The argument is the 
string of characters or number that the field is to be compared to. Press return 
and see: 


LOGICAL CONNECTIONS: 
AND 


l 
) OR( 
3 )THEN PRINT. 


YOUR STATEMENT: 
IF (TYPE EQUAL TO B)... 


ENTER CONNECTION NO: 
3 


Entering a 3 for )THEN PRINT will end the statement. Entering 1 or 2 would 
allow you to construct a longer statement with several comparisons. Here are some 
examples of statements that could be made for various files: 


EXMPLE 1: 
IF (NAME PATTERN MATCHES T?-5*) THEN PRINT. 


This statement means that in order for a record to be selected, the first 
character in its name must be “T", the second character may be anything, and the 
third and fourth character must be “-" and "5" respectively. The question mark is 
a wild character and will match any other character. The asterisk (*) at the end 
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of the argument means that anything after the fourth character will be ignored 
during the comparison. In other words, the following field contents would pattern 
match T? = 57, 


TAe5 
TB-5 
TR=52RP 
TQ-512 


Example 2: 
IF (TYPE INCLUDED IN ABR) THEN PRINT. 


INCLUDED IN means that if any letter in the designated field matches any letter in 
the argument then the record will be printed. In this example, any record whose 
TYPE field contains the letter A or the letter B or the letter R would be printed. 


Example 3: 
IF (DATE FOLLOWS 78/12/31 AND DATE PRECEDES 80/01/01) THEN PRINT. 


Only those records whose date field contains a date in the year 1979 will be 
printed. Notice that the date must be entered in a special way. The program is 
comparing the dates ALPHABETICALLY, therefore, the year must come first followed 
by the month then the day. Year, month, and day must be TWO DIGIT figures. That 
is, January 5, 1963 must be 63/01/05 not 63/1/5 or 05/01/63. The date in the 
record and.the date in the argument of the selection statement must both conform 
to this convention. 


Example 4: “< 
[IF (PRICE GREATER THAN 9.99) OR (NAME FOLLOWS A AND NAME PRECEDES ZZZ) THEN PRINT. 


The “OR" in this example means that two types of records will be printed. Those 
whose price is $10.00 or more and those whose name starts with a letter rather 
than a number or symbol. It is assumed that there are no items with the name 'A' 
and that no items have names starting with ‘'ZZZ'. 
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There are times when you may wish to change the value of a certain field in each 
record of a file. If the change can be expressed by a mathematical fomula, the 
file calculations mode of FLEX FILE CAN be used to make these changes 
automatically. For example, you may want to change the prices of a certain range 
of products by a certain amount or by a certain percentage. Your inventory file 
might have fields which describe the dimensions of each product. A separate field 
which contains the volume of each product could be calculated automatically. 


The FILE CALCULATIONS program is very similaar to the REPORT WRITER program except 
that calculations will change the contents of the fields of each record instead of 
changing the values in the columns of a report. 


The following chart describes the types of math operations that can be performed: 


OPERATIONS EQUIVILENT BASIC 

STATEMENT: STATEMENT : 

F2= ,F3 + ,FA F2=F34F4 

The sum of field 3 and field 4 is placed in field 2. 
F2= ,F3 ,- ,F4 F2=F3-F4 

Field 4 is subtracted from field 3 and the difference is placed in field 2. 
F2= ,F3 ,* ,F4 F2=F 3*F4 

Field 2 will equal the product of field 3 and field 4. 
F2= »F3 o/ »F4 F2=F3/F4 

Field 2 will equal field 3 divided by field 4. 

FI= 3 9° PI=aF3 

The value of field 3 will be placed in field 2. 

F2s, F3 <r oF 4 P26 3PF4 


Field 2 will equal field 3 to the power of field 4. 


F2s, ,SIN,F4 F2=SIN(F4) 

Field 2 will equal the sin offield 4 whenfield 4 is expressed in radians. Notice 
that the second space between the commas is left blank. The name of the operation 
is always placed in the third space. 


F2s 9 » INT,F4 F2=INT(F4) 

Field 2 will equal the integer part of field 4. For example, the integer part of 
33.7186 is 33. 

F2= , ,RND,1 F2=RND( 1) 


Field 2 will equal a random number. In this case, 1 is used as the random seed. 
In general, the seed should be a positive number. 


F2= , ,LOQG,F4 F2=sL0G(F 4) 
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FILE CALCULATIONS 
Field 2 will equal the natural log of field 4. 


For more information about these operations, consult your PET manual or a book 
about the language of BASIC. 


More complex calculations can be made by entering a series of operations. For 
example, F6=F2+F3+F4+F5 could be expressed: 


F6= ,F2 ,+ ,F3  (F6 now equals F2+F3) 
F6é= ,F6 ,+  ,F4 (F6 now equals F2+F3+F4) 
F6= ,F6 ,* ,F5 (F6 now equals F2+F3+F4+F5) 


FQ can be used as a temporary storage space when evaluating expressions such as 
F6=(F2+F3)*(F4+F5): 


FO= »F2 9? sc 3 
F6= ,F4 4+ = ,F5 
F6= oF 6 »* »FO 


Here's an example of sales tax. Field 3 is to be 4% of field 2 rounded down to 
the nearest cent. 


F3= ,F2 ,* ,400 


F3= 9 , INT »F3 
F3= »F3 »/ » 100 
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The files that are normally created by FLEX FILE are called RANDOM ACCESS files. 
They consist of the actual information the file contains and a separate 
bookkeeping file that the program uses to keep the file in sorted order. When a 
directory of the disk is displayed, the bookkeeping file for MAIL will appear as 
DB-MAIL. DB stands for DATA BASE. Qn some PET's the information file will not be 
displayed in the directory. On others, it will appear as RA-MAIL. RA stands for 
RANDOM ACCESS. 


There are two reasons you may have for changing a random access file to a 
sequential file. The first is that you wish to change the structure of the random 
file. You may wish to change the number of fields, or the record size, etc. This 
Procedure is described more fully in the next lesson. | 


The second reason is that you have a separate program, other than the FLEX FILE 
program, that only reads sequential files. You want this program to be able to 
use the information stored by DATA BASE. This requires an understanding of how 
the an in the sequential file must be ordered so that your program can make 
use of it. 


For an example, let us suppose we want to convert our mailing list random file to 
a sequential file. The order of the fields must be changed to accomodate the use 
of the sequential file. We will assume the purpose of this sequential file is to 
supply the-word processing program, PAPER MATE, with information to be used in a 
form letter. The form letter will require the name, company and address at the 
heading. The salutation wil] require the last name. The body of the letter will 
use the company name twice. The format of the sequential file required for such a 
letter would be: | 


SEQUENTIAL FILE LOADED FROM RANDOM 
FIELDS , FIELD NO: 

l. first name (heading) l. first name 
2- last name (heading) 2. last name 
3e company Nenadinal 2. company 

4. street heading) 4. street 

5. city (heading) 5. city 

6. State (heading) 6. state 

7. zip (heading) 7- Zip 

8. last name (salutation) 2. last name 
9. company (body ) 3 company 
10. company (body) 3- company 


Notice that the LAST NAME field and COMPANY field will appear several times each 
in each sequential record. Load and run DATA BASE, open the MAIL file, then press 
T for “transfer to another program’. The program will ask: 


TRANSFER TO: 

MAIL LABELS 

REPORT WRITER 

CREATE SEQENTIAL FILE 
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CREATE A SEQUENTIAL FILE 


LOAD FROM SEQENTIAL FILE 
ALPHABETICAL REORDERING 
NONE OF ABOVE 


Press C to load the CREATE SEQ program. The program will ask: 
NAME OF SEQUENTIAL FILE: 


Enter the name INSERTS. The program will list the field titles used in the random 
file and then ask: 


HOW MANY FIELDS WILL THE SEQUENTIAL FILE HAVE? 
Enter 10. The next question: 


SEQUENTIAL FIELD #1 SHOULD BE LOADED WITH WHICH RANDOM FIELD NO? 
(ENTER 0 FOR NULL) 
1 


We want seqential field # 1 to contain the same data as random field # 1 so enter 


@ 


The program will continue by asking for the random field source of each remaining 
sequential field. (See chart above). 


You will then be given a chance to make corrections. When you have made 
corrections, you will be asked the drive number of the sequential file and given a 
chance to initialize the drive if necessary. The program will ask you for the 
starting record number and the ending record number in case you want to only 
convert part of the file. The ending record number will automatically default to 
the total number of records in the file. When the file is saved, you wil be asked 
the drive number of the disk that has the FLEX FILE programs, and be given a 
chance to initialize the drive. Be carefull not to initialize the drive that has 
the random file. You will then be asked: 


WHICH DRIVE ARE FLEX FILE PROGRAMS 0N?(1/0/T) 


In many situations you will need three disks to create a sequential file. One for 
FLEX FILE programs, one for the sesquntial file, and one for the random acess 
file. This question gives you the chance to repace the program disk and 
initialize it if necessary. Be carefull not to initialize the disk that contains 
the random file. 


= 


28 


CMR RCE RICERR REESE FB 


LOAD FROM SEQENTIAL FILE 
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The LOAD SEQ program allows you to change a sequential file into a random access 
Tile. It also allows you to add the information in a sequential file to an 
existing random access file. For example, you may wish to use the names and 
addresses in an accounts receivable file to add records to your random access 
mailing list. In order to do this, you would have to know the structure of the 
sequential file, that is, the order in which the fields are stored within each 
record. 


FLEX FILE assumes that all records in the sequential file contain the same number 
of fields and that each field can be accessed by an INPUT# statement from BASIC. 
If this is not the case, a Separate program must be written to make the sequential 
file compatible with FLEX FILE. 


If you are using the LOAD SEQ program to start a new random file, you must first 
use the START NEW FILE program to create an empty random file. 


Load and run DATA BASE, open the random file, and then transfer to LOAD FROM 
SEQUENTIAL FILE. The program will ask: 


HOW MANY FIELDS DOES THE SEQUNTIAL FILE HAVE? 
0 


Enter the number of fields per record in the sesequential file. The program will 
ask: : 


RANDOM FIELD NO 1 SHOULD BE LOADED FROM SEQUENTIAL FIELD NO: 
(ENTER 0 TO LEAVE FIELD BLANK) 
Q 


This question will be asked for each random field. This allows you to change the 
order of the fields, to leave some random fields blank, or to load one sequential 
field into several random fields. 


When the file is loaded, you will be asked the drive number of the FLEX FILE 
programs and be given a chance to initialize. Be carefull not to initialize the 
random file drive. You will then be returned to the DATA BASE program. 


Note: The records will not be sorted in alphabetical order by any key. This will 
cause the FIND feature of the DATA BASE program to work improperly even when 
trying to access an old record that was in proper order befor the new records were 
added. The ALPHA ORDER program must be used to re-sort the file for each key. 


RESTRUCTURING A RANDOM FILE 


The CREATE SEQUENTIAL FILE program and the LOAD SEQUENTIAL program can be used to 
restructure a random file. The maximum number of records, number of fields, size 
if each record, title of each field, and number of key fields can be changed. 
First use the CREATE program to make a sequential file with the same field 
Structure as the random file (see previous chapter). The number of the fields and 
the order of the fields should be the same. Next, start a new random file on a 
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LOAD FROM A SEQUENTIAL FILE 


new disk with the desired record size, number of records etc. Then load the new 
empty random file with the contents of the sequential file. During the LOAD 
process, the order of the fields can be changed, old fields can be deleted, and 
new fields can be loaded with nulls (no information) to be filled later. Finally, 
the ALPHA ORDER program should be called in order to resort the file by all key 
fields. When the question is answered, you will be returned to DATA BASE. 
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ALPHABETICAL ORDERING 
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The ALPHA ORDER program can be used after loading from a sequential file to return 
the file to correct alphabetical order. It can also be used to sort a file by a 
field other than those already designated as key fields. 


The sample MAIL file is automatically sorted by LAST NAME and by ZIP as each 
record is entered with the ADD command . Let's assume that you wished to 
temporarily sort by LAST NAME and COMPANY. Load and run DATA BASE and open the 
MAIL file. Then transfer to the ALPHA ORDER program. You will see: 


WHICH KEY DO YOU WISH TO USE? 
l 


Change the 1 to a 2 and hit RETURN. You will see: 


FIELDS: 

Ll. FIRST NAME 
2+ LAST NAME 
3. COMPANY 
4. STREET 

5. CITY 

6. STATE 

7. ZIP 

8. COUNTRY 
9. PHONE 

10. TYPE 


YOU MAY CHANGE THE FIELD THAT KEY 2 REFERS TO IF YOU WISH: 
7 


We want key 2 to refer to COMPANY rather than to ZIP so change the 7 to a 3 and 
hit return. The program will ask: 


SHORT FILE (LESS THAN ABOUT 500 - 800 RECORDS) 
LONG FILE (TOO MANY RECORDS FOR KEYS TO FIT IN RAM.) 
RETURN TO DATA BASE 


Answering S for short file will cause the file to be sorted in a few minutes 
provided that the key fields will fit into RAM. Answering L for long file will 
sort a file of any length, but the sort will take much longer ~- about three hours 
for a thousand records. If you are not sure which sort to use, answer S. If the 
key fields won't fit, an QUT OF MEMORY ERROR message will be displayed and you 
will have to reload DATA BASE and start over. 


Resorting a long file is time consuming, but it only needs to be done when major 
changes are made to the file. 


While the file is betng sorted, it may display some information to let you know 
how the sort is progressing. Messages such as- (LOADING KEY) and (SORTING) may be 
displayed. Or, a series of numbers may be printed on the screen. These numbers 
will approach zero as the sort nears completion. When the sort is finished the 
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DATA BASE program will be loaded and the DATA BASE menu will be displayed. 
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At the back of this book is a list of subroutines and variables used in the Flex 
File programs. Three ways in which you may wish to modify the programs for your 
Own use are: 


1. Make specific changes to the existing programs. 
2. Write other programs that can be loaded as overlays by DATA BASE. 
3. Add new subroutines to DATA BASE. 


A word of warning: do not use any of the commands of the TOOL KIT or any other 
monitor extension while editing DATA BASE. Certain commands will destroy the 
machine language which is attached to the end of the program. 


ADDING SUBROUTINES TO DATA BASE ~- When the main DATA BASE menu is displayed, 
pressing U for USER will transfer control to a dummy subroutine at 5100. You may 
wish to insert your own routine at this address or to write your oun menu routine 
which transfers control to other subroutines. Some possible routines might be: 


1. Read a sequential file that has information about daily sales. The 
information is then used to update a random access inventory file. 


2. Derive some statistical analysis information from a random file. 


DATA BASE allows the user to acess records as if they were in alphabetical order. 
actually, the physical position of the records on the disk is in roughly the order 
in which they were entered. An array named PO%(RR,WK) keeps track of the sorted 
order of the records. The following sample routine reads the records from the 
disk in sorted order, adds the number 5 to field #2, displays the record, then 
writes it back to disk: 


6130 FOR RR=1 TO HR 
RR = Relative Record = the sorted position of each record) 
6135 WR=P0%(RR,WK) 
(WR = Which Record = the physical position of each record) 
(HR = How many Records in file) 
(WK = Which key determins order - when key=1, WK=0) 
6140 GOSUB 4200 
(4200 reads record at positon WR from disk) 
6145 F$(2)sSTR$( VAL(F$(2)) + 5 ) 
(fields are read as F$(X) strings) 
6150 GOBUB 3500 
(3500 DISPLAYS RECORD #RR) 
6155 GOSUB 4100 
(4100 writes record to WR position) 
6160 NEXT RR:RETURN 


Care must be taken not to edit any program that has been loaded by another 
Program. The start of variable pointer will be incorrectly set and the program 
will be saved as if it were a much larger program than it acually is. This 
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Situation will become apparent if a disk directory listing shows the program to 
contain as many or more blocks than DATA BASE. Programs should be loaded with a 
LOAD command in the immediate mode before editing. 


The PRINT REP program and the MAKE CALCS program allow calculations to be 
performed using various opperations such as INT and SIN and RND. It is posible to 
add new operations to these programs. For example, an opperation named TAREA 
could be added which would calculate the area of a triangle. A glance at the 
Subroutine at lines 3400-3499 in either of thesse programs should illustrate how 
to add new operations. If the follwing line were added to either of the programs, 


3470 IF O$="TAREA" THEN Xs8*C/2:RETURN 
Then the following line could be entered in the a calculations format file. 
F8= ,F4 ,TAREA,F5 


This line would calculate the area of a trariangle whose height was in field #4 
and whose width was in field 85. 


The following is a list of variables used by the data base program. 


VAR TABLES 


A - temp val of operation peramiter 

A1$,A2$ - used in patern matching routine 

AF - true if af%(_ is dimensioned 

AL - =Q when repeating one-]abel 

AR%( - arangement 

B - value of 4th cale parameter 

B$ - both R$ and 0$ . 

B7 - address of first byte of machine language parameters 
BF - browse field 

BL - block number 

BP - block pointer 

BR - bottom record of chunk 

C - value of calc parameter 

CC = control channel file no. 

CC$( = current column contents 

CF - change position flag, true if key field is changed, also continuous print flag 
CP%( - column positions 

CT( = column totals 

D - distance 

D$ - deletes space before default image 

EL = empty lines 

EQ( - equality types 

DR - drive no. 

E - error no. 

cS - error string 

F$( - field contents of a record : 

FI - find this record no. 

FI$ - find this field string 

FLZ( - logical flags, bit O=justify bit l=total, bit 2=average 
FOS - found this field string 
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FR - find this record no. 
FT$( - field titles 
G$ = got this string from keyboard 
GIS - acceptable keyboard responses 
» high byte 
HB - how many blocks required by 3.0 file 
HC - how many columns 
HF - how many fields per record 
HH - how many header lines 
HK - how many key fields 
HLS$( - header lines 
HO = how many math operations 
HS = how many selection statements 
KE - file # of keyboard 
fis length of fields that have been input or output 
LO%( - alowable number of places to left of decimal point 
LF§ - line feed or null 
LI = low IRQ byte 
LL$ - Tong line sent to printer 
LO$( - logical types 
LP - lines per page 
MD = maximum dimension size of arrays 
ML - address of machine language routine that moves a chunk of the po%() array 
down, thereby deletaing an ‘index card' - ML+52 moves a chunk up - ML+104 finds 
the position of a particular po%() value 
MM%( - can be used to count occurances of certain types of fields durring printing 
of a report. | 
“~ . maximum no. of records 
NaS = name of a random file 
N2$ - name of a format file 
O$ = temp oo$( 
QA$(, OB$(, OC$(, O00$( - Ist, 2nd 4th, 3rd math operation perameter 
P = position 
PQ - printer device # 
PL. = page line 
PQ%( - these pointers keep track of the sorted order of the records 
PR - printer device # 
Q$ - quote chr 
- flag true (-1) if 3.0 rom 
R4 - true if 4.0 rom 
- random access file no. 
RB - records per block 
ROZ( = places to right of decimal 
RR - relative record no. (sorted position of current record) 
RS - max size of each record 
RW - size to which most arrays are dimmed 
R$ - car return 
S - sector 
SA%(, SB%(, SE%(, SL(, - lst, 2nd, 3rd, 4th selection paramiters 
SE - seq file # 
SF -- current field sorted by 
“™,( - fields used for sorting 
Sf - Save pointers, true when bookkeeping needs to be saved 
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SP$ - spaces for padding 

S%({ - sectors for block map 

T = track 

T1$(,T2$( - lst and 2nd line of title of column 
T$ = try this string 

T%( - tracks for block map 

TL - col contents too long flag 

TR - top record of chunk, also truth of selection statement 
UK ~- remember key in current use 

UR = remember record in current use 

V - value from get (which key was pressed) 

WB - which block 

WC - which column 

WF - which field 

- which key 

WO = which math operation 

- which record 

WS - which selection statement 

X,X$,X4%,X2, - temporary storage 
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